home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Languages / MPW Oberon 2.1168 / OInterfaces / GXFonts.mod < prev    next >
Encoding:
Text File  |  1995-08-10  |  8.4 KB  |  128 lines  |  [TEXT/MPS ]

  1. (*
  2.      File:        GXFonts.mod
  3.  
  4.      Contains:    QuickDraw GX font routine interfaces.
  5.  
  6.      Version:    Technology:    Quickdraw GX 1.1
  7.                  Package:    Universal Interfaces 2.1ß1 in “MPW Prerelease” on ETO #17
  8.  
  9.      Copyright:    © 1984-1995 by Apple Computer, Inc.
  10.                  All rights reserved.
  11.  
  12.      Bugs?:        If you find a problem with this file, use the Apple Bug Reporter
  13.                  stack.  Include the file and version information (from above)
  14.                  in the problem description and send to:
  15.                      Internet:    apple.bugs.applelink.apple.com
  16.                      AppleLink:    APPLE.BUGS
  17.  
  18. *)
  19.  
  20. (*$TAGS-*)
  21. (*$CALLING PASCAL*)
  22. MODULE GXFonts;
  23.  
  24. IMPORT SYSTEM, Types, GXTypes, ScalerTypes;
  25.  
  26. (* $PUSH*)
  27. (* $ALIGN MAC68K*)
  28. (* $LibExport+*)
  29. (*$SET fontRoutinesIncludes TRUE*)
  30.  
  31. PROCEDURE GXNewFont*(storage: GXTypes.gxFontStorageTag; reference: GXTypes.gxFontStorageReference; attributes: GXTypes.gxFontAttribute): GXTypes.gxFont; (*ΔΔ C;*)
  32.     EXTERNAL (*•• C*);
  33. PROCEDURE GXGetFont*(fontID: GXTypes.gxFont; VAR reference: GXTypes.gxFontStorageReference; VAR attributes: GXTypes.gxFontAttribute): GXTypes.gxFontStorageTag;  (*ΔΔ C;*)
  34.     EXTERNAL (*•• C*);
  35. PROCEDURE GXFindFont*(storage: GXTypes.gxFontStorageTag; reference: GXTypes.gxFontStorageReference; VAR attributes: GXTypes.gxFontAttribute): GXTypes.gxFont;  (*ΔΔ C;*)
  36.     EXTERNAL (*•• C*);
  37. PROCEDURE GXSetFont*(fontID: GXTypes.gxFont; storage: GXTypes.gxFontStorageTag; reference: GXTypes.gxFontStorageReference; attributes: GXTypes.gxFontAttribute);  (*ΔΔ C;*)
  38.     EXTERNAL (*•• C*);
  39. PROCEDURE GXDisposeFont*(fontID: GXTypes.gxFont);  (*ΔΔ C;*)
  40.     EXTERNAL (*•• C*);
  41. PROCEDURE GXChangedFont*(fontID: GXTypes.gxFont);  (*ΔΔ C;*)
  42.     EXTERNAL (*•• C*);
  43. PROCEDURE GXGetFontFormat*(fontID: GXTypes.gxFont): GXTypes.gxFontFormatTag;  (*ΔΔ C;*)
  44.     EXTERNAL (*•• C*);
  45. PROCEDURE GXGetDefaultFont*(): GXTypes.gxFont;  (*ΔΔ C;*)
  46.     EXTERNAL (*•• C*);
  47. PROCEDURE GXSetDefaultFont*(fontID: GXTypes.gxFont): GXTypes.gxFont;  (*ΔΔ C;*)
  48.     EXTERNAL (*•• C*);
  49. PROCEDURE GXFindFonts*(familyID: GXTypes.gxFont; name: GXTypes.gxFontName; platform: GXTypes.gxFontPlatform; script: GXTypes.gxFontScript; language: GXTypes.gxFontLanguage; length: LONGINT; text: Types.ByteParameter; index: LONGINT; count: LONGINT; fonts: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  50.     EXTERNAL (*•• C*);
  51. PROCEDURE GXCountFontGlyphs*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  52.     EXTERNAL (*•• C*);
  53. PROCEDURE GXCountFontTables*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  54.     EXTERNAL (*•• C*);
  55. PROCEDURE GXGetFontTable*(fontID: GXTypes.gxFont; index: LONGINT; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr; VAR tableTag: GXTypes.gxFontTableTag): LONGINT;  (*ΔΔ C;*)
  56.     EXTERNAL (*•• C*);
  57. PROCEDURE GXFindFontTable*(fontID: GXTypes.gxFont; tableTag: GXTypes.gxFontTableTag; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr; VAR index: LONGINT): LONGINT;  (*ΔΔ C;*)
  58.     EXTERNAL (*•• C*);
  59. PROCEDURE GXGetFontTableParts*(fontID: GXTypes.gxFont; index: LONGINT; offset: LONGINT; length: LONGINT; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr; VAR tableTag: GXTypes.gxFontTableTag): LONGINT;  (*ΔΔ C;*)
  60.     EXTERNAL (*•• C*);
  61. PROCEDURE GXFindFontTableParts*(fontID: GXTypes.gxFont; tableTag: GXTypes.gxFontTableTag; offset: LONGINT; length: LONGINT; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr; VAR index: LONGINT): LONGINT;  (*ΔΔ C;*)
  62.     EXTERNAL (*•• C*);
  63. PROCEDURE GXSetFontTable*(fontID: GXTypes.gxFont; index: LONGINT; tableTag: GXTypes.gxFontTableTag; length: LONGINT; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr): LONGINT;  (*ΔΔ C;*)
  64.     EXTERNAL (*•• C*);
  65. PROCEDURE GXSetFontTableParts*(fontID: GXTypes.gxFont; index: LONGINT; tableTag: GXTypes.gxFontTableTag; offset: LONGINT; oldLength: LONGINT; newLength: LONGINT; tableData: (*ΔΔUNIVΔΔ*) Types.Ptr): LONGINT;  (*ΔΔ C;*)
  66.     EXTERNAL (*•• C*);
  67. PROCEDURE GXDeleteFontTable*(fontID: GXTypes.gxFont; index: LONGINT; tableTag: GXTypes.gxFontTableTag): LONGINT;  (*ΔΔ C;*)
  68.     EXTERNAL (*•• C*);
  69. PROCEDURE GXCountFontNames*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  70.     EXTERNAL (*•• C*);
  71. PROCEDURE GXGetFontName*(fontID: GXTypes.gxFont; index: LONGINT; VAR name: GXTypes.gxFontName; VAR platform: GXTypes.gxFontPlatform; VAR script: GXTypes.gxFontScript; VAR language: GXTypes.gxFontLanguage; text: Types.ByteParameter): LONGINT;  (*ΔΔ C;*)
  72.     EXTERNAL (*•• C*);
  73. PROCEDURE GXFindFontName*(fontID: GXTypes.gxFont; name: GXTypes.gxFontName; platform: GXTypes.gxFontPlatform; script: GXTypes.gxFontScript; language: GXTypes.gxFontLanguage; text: Types.ByteParameter; VAR index: LONGINT): LONGINT;  (*ΔΔ C;*)
  74.     EXTERNAL (*•• C*);
  75. PROCEDURE GXSetFontName*(fontID: GXTypes.gxFont; name: GXTypes.gxFontName; platform: GXTypes.gxFontPlatform; script: GXTypes.gxFontScript; language: GXTypes.gxFontLanguage; length: LONGINT; text: Types.ByteParameter): LONGINT;  (*ΔΔ C;*)
  76.     EXTERNAL (*•• C*);
  77. PROCEDURE GXDeleteFontName*(fontID: GXTypes.gxFont; index: LONGINT; name: GXTypes.gxFontName; platform: GXTypes.gxFontPlatform; script: GXTypes.gxFontScript; language: GXTypes.gxFontLanguage): LONGINT;  (*ΔΔ C;*)
  78.     EXTERNAL (*•• C*);
  79. PROCEDURE GXNewFontNameID*(fontID: GXTypes.gxFont): GXTypes.gxFontName;  (*ΔΔ C;*)
  80.     EXTERNAL (*•• C*);
  81. PROCEDURE GXCountFontEncodings*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  82.     EXTERNAL (*•• C*);
  83. PROCEDURE GXGetFontEncoding*(fontID: GXTypes.gxFont; index: LONGINT; VAR script: GXTypes.gxFontScript; VAR language: GXTypes.gxFontLanguage): GXTypes.gxFontPlatform;  (*ΔΔ C;*)
  84.     EXTERNAL (*•• C*);
  85. PROCEDURE GXFindFontEncoding*(fontID: GXTypes.gxFont; platform: GXTypes.gxFontPlatform; script: GXTypes.gxFontScript; language: GXTypes.gxFontLanguage): LONGINT;  (*ΔΔ C;*)
  86.     EXTERNAL (*•• C*);
  87. PROCEDURE GXApplyFontEncoding*(fontID: GXTypes.gxFont; index: LONGINT; VAR length: LONGINT; text: Types.ByteParameter; count: LONGINT; glyphs: INTEGER; was16Bit: Types.ByteParameter): LONGINT;  (*ΔΔ C;*)
  88.     EXTERNAL (*•• C*);
  89. PROCEDURE GXCountFontVariations*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  90.     EXTERNAL (*•• C*);
  91. PROCEDURE GXFindFontVariation*(fontID: GXTypes.gxFont; variationTag: GXTypes.gxFontVariationTag; VAR minValue: Types.Fixed; VAR defaultValue: Types.Fixed; VAR maxValue: Types.Fixed; VAR name: GXTypes.gxFontName): LONGINT;  (*ΔΔ C;*)
  92.     EXTERNAL (*•• C*);
  93. PROCEDURE GXGetFontVariation*(fontID: GXTypes.gxFont; index: LONGINT; VAR minValue: Types.Fixed; VAR defaultValue: Types.Fixed; VAR maxValue: Types.Fixed; VAR name: GXTypes.gxFontName): GXTypes.gxFontVariationTag;  (*ΔΔ C;*)
  94.     EXTERNAL (*•• C*);
  95. PROCEDURE GXCountFontInstances*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  96.     EXTERNAL (*•• C*);
  97. PROCEDURE GXGetFontInstance*(fontID: GXTypes.gxFont; index: LONGINT; variation: GXTypes.gxFontVariation): GXTypes.gxFontName;  (*ΔΔ C;*)
  98.     EXTERNAL (*•• C*);
  99. PROCEDURE GXSetFontInstance*(fontID: GXTypes.gxFont; index: LONGINT; name: GXTypes.gxFontName; variation: GXTypes.gxFontVariation): LONGINT;  (*ΔΔ C;*)
  100.     EXTERNAL (*•• C*);
  101. PROCEDURE GXDeleteFontInstance*(fontID: GXTypes.gxFont; index: LONGINT; name: GXTypes.gxFontName): LONGINT;  (*ΔΔ C;*)
  102.     EXTERNAL (*•• C*);
  103. PROCEDURE GXCountFontDescriptors*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  104.     EXTERNAL (*•• C*);
  105. PROCEDURE GXGetFontDescriptor*(fontID: GXTypes.gxFont; index: LONGINT; VAR descriptorValue: Types.Fixed): GXTypes.gxFontDescriptorTag;  (*ΔΔ C;*)
  106.     EXTERNAL (*•• C*);
  107. PROCEDURE GXFindFontDescriptor*(fontID: GXTypes.gxFont; descriptorTag: GXTypes.gxFontDescriptorTag; VAR descriptorValue: Types.Fixed): LONGINT;  (*ΔΔ C;*)
  108.     EXTERNAL (*•• C*);
  109. PROCEDURE GXSetFontDescriptor*(fontID: GXTypes.gxFont; index: LONGINT; descriptorTag: GXTypes.gxFontDescriptorTag; descriptorValue: Types.Fixed): LONGINT;  (*ΔΔ C;*)
  110.     EXTERNAL (*•• C*);
  111. PROCEDURE GXDeleteFontDescriptor*(fontID: GXTypes.gxFont; index: LONGINT; descriptorTag: GXTypes.gxFontDescriptorTag): LONGINT;  (*ΔΔ C;*)
  112.     EXTERNAL (*•• C*);
  113. PROCEDURE GXCountFontFeatures*(fontID: GXTypes.gxFont): LONGINT;  (*ΔΔ C;*)
  114.     EXTERNAL (*•• C*);
  115. PROCEDURE GXGetFontFeature*(fontID: GXTypes.gxFont; index: LONGINT; VAR flags: GXTypes.gxFontFeatureFlag; VAR settingCount: LONGINT; settings: GXTypes.gxFontFeatureSetting; VAR feature: GXTypes.gxFontFeature): GXTypes.gxFontName;  (*ΔΔ C;*)
  116.     EXTERNAL (*•• C*);
  117. PROCEDURE GXFindFontFeature*(fontID: GXTypes.gxFont; feature: GXTypes.gxFontFeature; VAR flags: GXTypes.gxFontFeatureFlag; VAR settingCount: LONGINT; settings: GXTypes.gxFontFeatureSetting; VAR index: LONGINT): GXTypes.gxFontName;  (*ΔΔ C;*)
  118.     EXTERNAL (*•• C*);
  119. PROCEDURE GXGetFontDefaultFeatures*(fontID: GXTypes.gxFont; features: GXTypes.gxRunFeature): LONGINT;  (*ΔΔ C;*)
  120.     EXTERNAL (*•• C*);
  121. PROCEDURE GXFlattenFont*(source: GXTypes.gxFont; VAR stream: ScalerTypes.scalerStream; VAR block: GXTypes.gxSpoolBlock);  (*ΔΔ C;*)
  122.     EXTERNAL (*•• C*);
  123.  
  124. (* $ALIGN RESET*)
  125. (* $POP*)
  126.  
  127.  END GXFonts.
  128.